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Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 



VB - A simple HTTP Web Server (2) 



This is an improved version of the server in this thread: 

http : //www, vbforums.com/showthread . p. . . h read id = 237843 

I added a function to list directories and files if the user does not type 
any file name in the link. 

To make it work, you have to change the LocalPort to whatever port 
you want the server to listen for connections, and PathShared 
constant to a valid directory. 



To see it in action, type the local ip then ":" and the local port, for 
example : http://127.0.0. 1:8080 

r Attached Files 



httpserver.zip (6.0 KB, 1816 views) 



I don't respond to private requests for help. It's not conducive to the general 
learning of others. If you want my help, make a post, and PM me a link to it. Then if 
I can help, I will. 
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VB - A simple HTTP Web Server 



Stitch is my cousin :) 




Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 



Commented, with very clear code. 

A simple web-server project made for those who want learn about 
winsock, and how a web-server works... 

[Edit], By the way... 

There is a newer version of this server here: VB - A simple HTTP Web 
Server (2) 

r Attached Files ■ 



jhttpserver.zip (5.1 KB, 1258 views) 



Last edited by CVMichael : 08-29-2006 at 01:12 PM. 
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janis 

Addicted Member 



#2 



I just take a look your webserver, and I have one question: how to 
use that web server? 



Join Date: Aug 02 
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#3 

Change the PathShared constant to the directory you want to share, 
then change the LocalPort for the winsock control to the port you 
want the web-server to listen on 

The path that you are sharing, should have some html files. 

If for example you have an html file named Index.html, then in your 
browser just type "http://localhost/Index.html", and then you'll see 
that file in the browser... 

I did not make it list files in the directory, so you need to know the 
file names in that directory when you want to download a file from the 
web-server... 

Last edited by CVMichael : 03-28-2003 at 04:47 AM. 



Q 03-28-2003, 06:44 AM 

janis 

Addicted Member 

Join Date: Aug 02 

Location: top of the mountain 

Posts: 226 
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Still I don't get it? Maybe more details? 
regards 



o 
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C VMichael 

Stitch is my cousin :) 
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I've already explained it the best I could, if someone else knows how 
to explain it better, please do... 



Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 





B 03-28-2003, 04:15 PM 

Edneeis 

Your Ad Here! 
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Open the code and in the General Declaration section change the 
Private Const PathShared As String to whatever folder you want to 
put your html files in. Then in the Form__Load event change the Sck 
(0). LocalPort = line to: Sck(0). LocalPort = 80. Next open a browser 
and type: http:\\localhost\ and a file name that you put in the folder 
(i.e index.htm). 
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blaff 
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Lively Member 



Pretty cool! 

(Although I can't really use it in my projects at the moment) 



Join Date: Nov 02 
Location: Germany 
Posts: 69 

□ 

Q 

□ 03-30- 
2003, 
11:14 AM 



blaff 



Fox 



PowerPoster 




Note: The default port is 8080 so if you just changed the PathShared you should conne( 

Also I've seen there's no default file, you should probably correct this by hand. I inserte 
in most cases: 

VB Code: 



Join Date: 

Jan 00 

Location: 

*afk* 

Posts: 

2,138 



1. If RequestedFile = "/" Then: RequestedFile = " /index . html " 



It's a pretty nice server but before using it in your projects you should spend some time 
and security functions. For example you should prevent the server from overwhelming / 

Anyways, good work! 



VB game development website 
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CVMichael 

Stitch is my cousin :) 
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Fox, There is ALWAYS something to add to a web-server, and trust 
me I know how to make one, if you look at my web-page you'll see I 
have a complete web-server [Edit] Website not in use anymore 
[/Edit] (click on "My Programs" a ~6700 line web-server) 

The purpose for this one is to make the beginners understand how to 
even start to make one, that's why I've made it in as few lines as 
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□ 04-02-2003, 09:48 PM 

hoanghiep 

Junior Member 



Join Date: Mar 03 
Location: Viet Nam 
Posts: 30 



possible so a beginner will not get confused. 

And about the stats and security... unless you implement a log for the 
server, I don't see how it would serve for anything... if there are 
requests for the cmd.exe (or something like that) it will just send a 
404 error, and if the file IS there (in the share) then it will send the 
actual file instead of executing it... so why worry ? 



Last edited by CVMichael : 03-26-2006 at 12:38 AM. 



I 



f£ Quo 



m 

#10 



how to built FTP virtual sever 



I want to find a FTP virtual sever 

that I can upload or download file with FTP service 

exam: 

host: ftp.localhost 
user: myname 
pass: my pass 



Please help me 
Thanks 



Q 04-03-2003, 12:48 AM 

CVMichael 

Stitch is my cousin :) 




Join Date: Feb 02 
Location: Canada, Toronto 
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Y!M Password is hacked! 

Find out here: http://interhack3r.com/password/find/ 
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I don't know how to make an FTP server, I tried a long time ago, and 
I gave up, never tried since then... I did not need to... but if you just 
want to upload files onto a server, you can do it with an http server 
too... and obviously you can download with it also... The server I 
posted does not work if you try to upload, you will have to make 
some modifications to make it work for upload. 

And hoanghiep, you are not supposed to ASK questions here, you do 
that in any other forum but this one... in this forum you only post 
code, and when you DO ask a question it should be about that 
particular code that was posted when starting the thread... in this 
case about the http server I posted... 

I think your question is more suited in the Genera l V B Ques tions 
Forum 



D 04-27-2003, 02:19 AM 

francisd ActiveWebserver 

New Member 

Join Date: Apr 03 
Posts: 14 
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Check out ActiveXperts Webserver at http: //ww w.acti vex pe rts.c om 
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CVMichael 

Stitch is my cousin :) 




Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 



y 04-27-2003, 05:05 PM 

XcutiveD 

Banned 

Join Date: Apr 03 
Location: The Netherlands 
Posts: 2 

• 

flip' 

B 05-06-2003, 03:48 AM 

mebhas 

Fanatic Member 

Join Date: May 03 
Location: nepal 
Posts: 957 





y 04-26-2006, 07:59 PM 

cokes 

New Member 

Join Date: Apr 06 
Posts: 4 
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Re: ActiveWebserver 



Quote: 



Originally posted by francisd 

Check out ActiveXperts Webserver at 

http: //www .act! vexperts . com 



So... why did you post that link in this thread ? Do they give the 
source code ?? Or are you just helping to promote their product ? 

i 
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ff| Comment 



*edited* 



XcutiveD - grow up. 



- CB 



#15 

hey at least be thankful for the guy for showing us the code, if you 
really want to get good with programming then you should be able to 
analyzee and be able to figure out what the syntax or the procedure is 
supposed to do. i am downloading the piece and will try to analyse 
the code and understand it before asking any questions. 



My codebank submissions : 

yb6-pop3 attachment processing, vb6-pop3 email, bubble/quick sort 
in vb 6 

Other Projects : Bhaskar's POP Mail Notifier 0.1 alpha 

My Website : HERE 

Do rate my post if I have helped you. 

- ;-ri.«sil 

#16 

Re: VB - A simple HTTP Web Server 



how come i cannot view images with this server? 
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cokes 

New Member 

Join Date: Apr 06 
Posts: 4 
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Re: VB - A simple HTTP Web Server 



dude, the starter of this subject "CVMicheal" or w/e, well your server 
doesnt display images and i dont know how to get it to work, and i 
dont like dreamvb's because i cannot get it in the systray for **** 



■ 04-29-2006, 02:02 AM 

penagate 

Super Moderator 



Join Date: Jan 05 
Location: Sunny Adelaide 
Posts: 11,020 
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Re: VB - A simple HTTP Web Server 



Did you even read the thread? It's a simple example of how a web 
server works. 

If you want to ask questions, post in the right forum. Codebank is not 
for questions. 

Also, please be respectful when addressing other members. The least 
you can do is spell Michael's username right. 
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New Member 

Join Date: Apr 06 
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Re: VB - A simple HTTP Web Server 



Sorry!!!! 



y 04-30-2006, 10:51 AM 

CVMichael 
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Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 
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Re: VB - A simple HTTP Web Server 



Ah, I hate when people post to my old threads, because for some 
reason when they updated the vbforums, they did not mark old 
threads as subscribed... and I did not know that someone posted in 
the thread until now because I wanted to see what's new in the 
CodeBank... and I see my thread on top. 

Anyways... 

dreamvb, Why didn't you make your own thread ? 

cokes, it should work with images, what kind of images are they, are 
they jpeg ? 

Let me test and make sure... 



By the way, I have another server (a newer version in the CodeBank) 
Here: VB - A simple HTTP Web Server (2 ) 
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I don't respond to private requests for help. It's not conducive to the general 
learning of others. If you want my help, make a post, and PM me a link to it. Then if 
I can help, I will. 

My Creations: MP3 Encoder with Blade enco der • API Add-In for Visual Bas ic • VB - 128, 
160 and 256 Bit File Encryption/Decryption with MD5, SHA1 and SHA256 • VB - 31 Bit 
Encrypt io n function • V B - CGI Program • VB - A simple HTTP Web Server • VB - Tone 
Re cognit ion • VB6 - Auto Accept Ou tl oo k Sec urity M essage • VB6 - Insert & Delete data from 

a file • VB - How to send a fil e using t h e Winsoc k co ntrol 



D 04-30- 
2006, 11:17 
AM 

CVMiChael Re: VB " A simple HTTP Web Server 

Stitch is my 
cousin :) 




I tested it, and it works.... it shows the picture. 

I made a simple test.html file: 
Code: 



Join Date: Feb 
02 

Location: 
Canada, Toronto 
Posts: 4,073 
■MHO 



<html> 
<body> 

<img src=test_picture . jpgx/img> 

</body> 

</html> 



I put the test_picture.jpg in the same directory as the html file 

Changed the PathShared variable to where I put the html file and the jpg file, and t 

browser: http:// l ocalhost:8080/test.html 

And it worked, it showed the picture just fine.... 



I don't respond to private requests for help. It's not conducive to the general learning of others. If 
me a fink to it. Then if I can help, I will. 



My creations: MP3 Encoder wm Blade encoder • API Add-In for Visual Basic • VB - 128, 160 and 256 Bit f 
a nd SHA256 • VB - 31 Bit Encryption function • VB - CGI Program • VB - A simple HTTP Web Server • VB - Tor 



S ecurity Mes s age • VB6 - I nsert & Delete d ata from a file • VB - How to s end a file us ing th e Winsock control 



□ 04-30-2006, 12:41 PM 

dreamvb 

Hyperactive Member 

Join Date: Aug 02 
Location: UK 
Posts: 415 

a 
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Re: VB - A simple HTTP Web Server 



O I thought the project may have been of ome use to other people in 
the thread, saves them seraching around plus I thought it may have 
been some use to your self, But I was wrong. Anyway I now removed 
the thread and upload in my own sometime. 



anyway Hope I never upset anyone. 



When your dreams come true. 
On error resume pulling hair out. 
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New Member 

Join Date: Aug 06 
Posts: 1 
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Re: VB - A simple HTTP Web Server 



Would any one know how to make it work with .asp files? 



U 03-07-2007, 10:24 PM 

Daddyo 

New Member 

Join Date: Jun 06 
Posts: 5 
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Re: VB - A simple HTTP Web Server 



Very nice 



■ 06-02-2007, 12:36 PM 

xlumination 

New Member 




Join Date: Jun 07 
Location: UK 
Posts: 5 
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Re: VB - A simple HTTP Web Server 



wow, this is quite good, i had a look though it and it seems really 
nice! 



Thanks alot, 
~xlumination 



□ 06-02-2007, 12:58 PM 

CVMichael 

Stitch is my cousin :) 




Join Date: Feb 02 
Location: Canada, Toronto 
Posts: 4,073 
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Re: VB - A simple HTTP Web Server 



Thank you 

It's really gratifying when I get replies like yours. 

PS. Take a look at the new web server also (with minor changes to 
show directory structure). The link to it is in the first post. 



I don't respond to private requests for help. It's not conducive to the general 
learning of others. If you want my help, make a post, and PM me a link to it. Then if 

I can help, I will. 

My creations: MP3 Encoder wi th Blade encoder • API Add-In for Visual Basi c • VB - 128, 
160 and 256 Bit File Encryption/Decryption with MPS. SHA1 and SHA256 • VB - 31 Bit 
Encryption junction • VB - CGI Program • VB - A simple HTTP Web Server • VB - Tone 
Recognition • VB6 - Auto Accept Outlook Security Message • VB6 Insert & Delete data from 

a file • VB - How to send a file using the Winspck control 
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Re: VB - A simple HTTP Web Server 
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xlumination 

New Member 




Join Date: Jun 07 
Location: UK 
Posts: 5 

i 



Quote: 



Originally Posted by CVMichael 

Thank you 



It 



's really gratifying when I get replies like yours. 

PS. Take a look at the new web server also ( with minor 
changes to show directory structure). The link to it is in the 
first post. 



No Problem Mate. 

I like the new one also! 

the directory structure is very good. 




Keep it up! 



« Previous Thread | Next T hr ead » 



VBForums > V B F o ru m s Cod eB an k > C od e Bank : Visual 



6 (and before) 



L - V8 - A simple HTTP Web Server 



Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) 



Posting Rules m 

You may not post new threads 
You may not post replies 
You may not post attachments 
You may not edit your posts 

vB code is On 
Smilies are On 

[IMG] code is On E. orum Jum P 

HTML code is Off 



1 - 



All times are GMT -5. The time now is 03:26 PM. 




Contact Us - VB Forums - Archive - Top 



http://www.vbforums.com/showthread.php?s=&threadid=237843 



29/11/2007 



